home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
distortfx
/
melt
< prev
next >
Wrap
Text File
|
1999-06-15
|
1KB
|
44 lines
Filter Factory Plugin Information:
FILENAME: DCMELT.8BF
CATEGORY:
DCspecial
TITLE:
melt
COPYRIGHT:
Copyright ) 1996 Dennis Crombie
All Rights Reserved.
AUTHOR:
Dennis Crombie
Map 0: [Map 0:]
Map 1: [Map 1:]
Map 2: [Map 2:]
Map 3: [Map 3:]
Control 0: [X Position:]
Control 1: [Y Position:]
Control 2: [Width:]
Control 3: [Length:]
Control 4: [Stretch:]
Control 5: [Control 5:]
Control 6: [Control 6:]
Control 7: [Control 7:]
R=
put(val(0,0,X),0),put(val(1,0,Y),1),put(val(2,0,X),2),put(val(3,get(2),Y),3),put(val(4,2,50),4),dif(x,get(0))<get(2)&&y>get(1)&&y<get(3)+get(1)||c2m(dif(x,get(0)),dif(y,get(1)+get(3)))<get(2)?mix(src(x,get(1)+(y-get(1))/get(4)+1,z),src(x,get(1)+(y-get(1))/get(4),z),(get(4)+y-get(1))%get(4),get(4)%(get(4)+y-get(1))):c
G=
dif(x,get(0))<get(2)&&y>get(1)&&y<get(3)+get(1)||c2m(dif(x,get(0)),dif(y,get(1)+get(3)))<get(2)?mix(src(x,get(1)+(y-get(1))/get(4)+1,z),src(x,get(1)+(y-get(1))/get(4),z),(get(4)+y-get(1))%get(4),get(4)%(get(4)+y-get(1))):c
B=
dif(x,get(0))<get(2)&&y>get(1)&&y<get(3)+get(1)||c2m(dif(x,get(0)),dif(y,get(1)+get(3)))<get(2)?mix(src(x,get(1)+(y-get(1))/get(4)+1,z),src(x,get(1)+(y-get(1))/get(4),z),(get(4)+y-get(1))%get(4),get(4)%(get(4)+y-get(1))):c
A=
a